source libstack.tcl
source dom_namespace.tcl
source dom_class.tcl
source dom_using.tcl
source dom_flush.tcl
source assert.tcl

proc InitParse {} {
	global NAMESPACE SUPERCLASS stack_ends stack_namespace stack_superclass end
	
	set NAMESPACE ""
	set SUPERCLASS ""
	proc end {} {}
	set stack_ends {}
	set stack_namespace {}
	set stack_superclass {}
}